home *** CD-ROM | disk | FTP | other *** search
- ;PAGESTREAM 3.0i TUNEUP #2 PATCH INSTALLATION SCRIPT
- ;COPYRIGHT ©1996 SOFT-LOGIK PUBLISHING CORPORATION
-
- ;QUIT PROGRAMS
- (message "\n\nIf PageStream3, BME2 or PageLiner are running now, quit them before continuing.")
- (run "avail flush" (safe))
-
- ;USE ASSIGNS TO AVOID THE STUPID INSTALLER'S CRASH BUG
- (run "CD PageStream3:" (safe))
- (run "CD SoftLogik:" (safe))
- (run "assign fonts: softlogik:fonts add" (safe))
-
- ;GET DESTINATION
- (set PGSdest (getassign "PageStream3" "a"))
- (set SLdest (getassign "SoftLogik" "a"))
- (if (OR (= PGSdest "") (= SLdest ""))
- (abort "PageStream3: and/or SoftLogik: are not assigned. You must properly install PageStream3.0i before applying this update patch.")
- )
- (set @default-dest PGSdest)
-
- ;CHECK IF BME EXISTS
- (if (<> (exists "PageStream3:BME") 1)
- (abort "PageStream3 is not in the PageStream3: directory. You must properly install PageStream3.0i before applying this update patch.")
- )
-
- ;UPDATE BME2
- (if (exists "PageStream3:BME")
- (
- (working "Patching BME to 2.0f...")
- (run "spatch >NIL: <NIL: -oPageStream3:BME2.0f -pBME.pch PageStream3:BME")
- (if (exists "PageStream3:BME2.0f")
- (
- (delete "PageStream3:BME")
- (rename "PageStream3:BME2.0f" "PageStream3:BME")
- )
- (message "\nThe patch to BME was not successful. Refer to the Read.1st! file for further instructions.")
- )
- (delete "ram:BME.pch" (safe))
- )
- )
-
- ;REMOVE THE LHEX PROGRAM
- (delete "spatch" (safe))
- (delete "Install-TuneUp2.info" (safe))
-
- ;DONE
- (exit "BME 2.0f installed!")
-